home *** CD-ROM | disk | FTP | other *** search
/ Software of the Month Cl…Business) - New Member 21 / Software of the Month Club XXI - New Member Business.ISO / mac / Business / Financial Portfolio v4.1 ƒ / Financial Portfolio v4.1 / Financial Portfolio v4.1.rsrc / LENS_132_Report Navigator.bin < prev    next >
Text File  |  1995-11-23  |  981b  |  29 lines
  1. ItemType: WIND
  2. Rect: 170,249,362,329
  3. AutoSize: FALSE
  4. Style: Windoid
  5. HasTitleBar: TRUE
  6. HasZoomBox: TRUE
  7. HasCloseBox: TRUE
  8. HasGrowBox: FALSE
  9. MinSize: 192,2
  10. MaxSize: 192,80
  11. Name: Report Navigator
  12. Params: i1_Text┬i0_TopLeft
  13.  
  14. ItemType: LIST
  15. Rect: 6,4,186,64
  16. TextFont: Geneva
  17. TextSize: 10
  18. AutoSize: FALSE
  19. Name: list
  20. Logic: Single
  21. Text: 
  22. Script: --on mouseUp  wdID,wdName,objNo,objName,objValue┬if " {sample report}" is in the short name of this cd then┬  get windowscript("Example",WSTL(230,200))┬else┬  get wsGet(wdID,"list","SelectionText")┬  if (it¡empty) and (there is a cd (item 1 of it)) then┬    visual iris open fast┬    go cd (item 1 of it)┬    put ((item 1 of the screenRect)+3&",40") into TL┬    -- wsSet wdID,"0","Height","1"┬    wsSet wdID,"0","TopLeft",TL┬  else┬    wsSet wdID,"list","Selection", "" -- remove highlight┬  end if┬end if┬--end mouseUp
  23.  
  24. ItemType: TEXT
  25. Rect: 6,65,180,77
  26. TextFont: Geneva
  27. TextSize: 9
  28. Name: instr
  29. Text: Click on an item to see its detail card.